;
;  WKORDER.TXT -- subr to print sample work order
;			(c) Copyright 1990 Chris Butler

local d lpt1	; set output device

send @d "  MAXIMO SERIES 3                                                 PSDI"
send @d " "
send @d "                   MAINTENANCE     WORK         ORDER"
send @d "  --------------------------------------------------------------------"
send @d " "
send @d "  WORK ORDER #:     2002                   ENTERED BY:    SUE EVANS"
send @d " "
send @d "  WORK ORDER START DATE: SEP 20, 1990      REQUIRED DATE: SEP 20, 1990"
send @d "  ===================================================================="
send @d "  EQUIP #               DESCRIPTION        LOCATION"
send @d "  -------               -----------        --------"
send @d "    13142                  CARTONER           LINE1"	      
send @d "  --------------------------------------------------------------------"
send @d "  WORK TYPE             STATUS        PRIORITY     REQUESTOR      DEPT"
send @d "  ---------             ------        --------     ---------      ----"
send @d "  EMERG                   APPR               0     MAX ROBERTS    2813"
send @d "  --------------------------------------------------------------------"
send @d "  DESCRIPTION"
send @d " "  
send @d "      1)  Inspect ON/OFF and limit switches."  
send @d "      2)  Clean motor."
send @d "      3)  Inspect gear reducer unit. Check gear box oil."
send @d "      4)  Inspect, clean, and lubricate drive chain."
send @d "      5)  Check conveyor belt and pulleys for proper tension."
send @d "      6)  Inspect and lubricate roller bearings and wheels."
send @d "      7)  Replace worn block bearings, index plate bolts."
send @d "      8)  Change oil in gear reducer. Examine drained oil."
send @d "      9)  Record amperage and voltage with motor operating."
send @d "     10)  Run conveyor 15 minutes for noise and operation."
send @d "  --------------------------------------------------------------------"
send @d "  PARTS/DESCRIPTION:          EST QTY:     ACT QTY:   MATERIAL COST:"
send @d " "
send @d "     PIN #38 air cylinder oil        1                         175.00"
send @d "     grease for BPM's                1                         125.00"
send @d "     bushing                        12                           6.00"
send @d "     bushing                        12                          17.88"
send @d "     block bearing                   1                          43.79"
send @d "     plate                           4                           5.96"
send @d "     cam                             2                           5.00"
send @d "     washer oilite                  12                          30.00"
send @d "     E-43 tubing pin                 3                          11.37"
send @d "     508-2 lubricator wat            1                           3.79"
send @d "     FAFNER .058 spher. bearing      6                           3.90"
send @d "                                 -----        -----      ------------"
send @d "  TOTALS                            63                         427.69"
send @d "  -------------------------------------------------------------------"
send @d "  CRAFT INFORMATION:            HOURS:                          COST:"
send @d " "
send @d "     Mechanic 1st class              8                         120.00"
send @d "     Electrician Apprentice          2                          16.00"
send @d "     Mechanic 2nd class              2                          16.00"
send @d "                                ------                       --------"
send @d "  TOTALS                            12                         156.00"
send @d "  ===================================================================="
send @d " "
send @d " "
send @d " "
send @d "  --------------               ------------              -------"
send @d "  Completed Date               Completed By              Foreman"

return   ; SUBR WORKORDR.TXT